'Energy substance for new filters.
'When filter bacteria has grown to
'sufficient level this can be removed.
'
start
.timer inc
stop

cond
*.nrg 128 > and
*.chlr 16000 <
start
32 .mkchlr store
stop

cond
*.nrg 15999 > and
*.timer 8 >
start
314 rnd .aimdx store
32 .shootval store
-2 .shoot store
stop
